object frmIssue: TfrmIssue Left = 348 Top = 121 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Issue Credit' ClientHeight = 141 ClientWidth = 233 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] Position = poScreenCenter OnClose = FormClose PixelsPerInch = 96 TextHeight = 16 object GroupBox1: TGroupBox Left = 8 Top = 4 Width = 216 Height = 88 TabOrder = 0 object Label1: TLabel Left = 8 Top = 23 Width = 51 Height = 16 Caption = 'Number' end object Label2: TLabel Left = 8 Top = 54 Width = 48 Height = 16 Caption = 'Amount' end object edtNumber: TEdit Left = 85 Top = 19 Width = 121 Height = 24 TabOrder = 0 end object edtAmount: TEdit Left = 85 Top = 50 Width = 121 Height = 24 TabOrder = 1 end end object btnPost: TButton Left = 21 Top = 103 Width = 89 Height = 28 Caption = 'Post' ModalResult = 1 TabOrder = 1 OnClick = btnPostClick end object btnCancel: TButton Left = 122 Top = 103 Width = 89 Height = 28 Caption = 'Cancel' ModalResult = 2 TabOrder = 2 end end